home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 1995 #5 & #6 / Amiga Plus CD - 1995 - No. 5 and 6.iso / pd / serien / purity / nr.15 / kickpascal-programme / gbu / anleitung next >
Text File  |  1995-04-22  |  3KB  |  75 lines
  1.  
  2.  
  3.  
  4. Hallo Freax !!!!!!!!!!!!
  5.  
  6. Nachdem ich die Fischereiprüfung gepackt habe, habe ich doch wieder
  7. etwas mehr Zeit um meinen Computer zu quälen ! Nachdem Björn mit dem
  8. PurityMag wieder voll zugeschlagen hat und Gadgets mit underscore
  9. (unterstrichenen) Buchstaben präsentiert hat, zeige ich Euch heute, wie
  10. man das ganz einfach selbst machen kann. Der Sinn dieser Unterstreichung
  11. eines Buchstabens ist ja der, daß der Anwender erkennen kann, mit welcher
  12. Taste er ein Gadget aktivieren kann. Da liegt auch schon ein Problem.
  13. Wie erkenne ich, welche Taste gedrückt ist ? Am einfachsten: Das Vanillakey-
  14. Flag setzen und dann den Messagecode abfragen, wie es in meinem Beispiel-
  15. Programm dargestellt ist. Woher weiß ich, welche Taste welchen Code hat ?
  16. Kein Problem mit folgendem Miniprogramm:
  17.  
  18.  PROGRAM mini;
  19.   VAR c:CHAR;
  20.  
  21.   BEGIN
  22.    readln(c);
  23.    writeln(c,' ',ORD(c));
  24.   END.
  25.  
  26. Was macht das Programm ? Ganz einfach, es liest einen Buchstaben ein
  27. und gibt dazu den Code an, der dann später als vanillakey abgefragt
  28. werden kann. Die Funktionstasten und die Pfeiltasten kann man damit
  29. leider nicht abfragen.
  30.  
  31. Was bedeutet gbu eigentlich ?
  32. gbu bedeutet GadgetBorderUnderline. Gbu ist eine Prozedur, die einen
  33. dreidimensionalen Rahmen um ein Gadget zeichnet und außerdem noch den
  34. Buchstaben unterstreicht, mit dem das Gadget aktiviert werden kann.
  35. Ihr muß man folgende Parameter übergeben:
  36.  wo  = Zeiger auf das  Window, auf dem das Gadget erscheinen soll
  37.  was = ein Zeiger auf das Gadget, welches umrandet werden soll und
  38.        bei dessen Intuitext ein Buchstabe unterstrichen werden soll.
  39.        soll kein Buchstabe unterstrichen werden, einfach einen Buchstaben
  40.        angeben, der nicht im Intuitext des Gadgets vorkommt.
  41.  
  42.   c  = der Buchstabe, der unterstrichen werden soll. Kommt der Buchstabe
  43.        mehrmals vor, wird er nur das erste Mal unterstrichen.
  44.  
  45. So, ich glaube, das sollte reichen. Ihr dürft auch mal was denken.
  46. Ach ja, die Pozedur gbord (auch aus meinem Hause) braucht Ihr dann nicht
  47. mehr zu benutzen.
  48.  
  49. Anbei zwei Beispielprogramme, die die neuen Features bieten. Das erste ist
  50. aus meinem Programm Rogerdat, dessen neuste Version Ihr gegen Leerdisk+
  51. frankierten Rückumschlag bekommen könnt, oder gegen 5 DM in Briefmarken.
  52. Die neuste Version verfügt übrigens über Menüführung !
  53. Das andere ist ein kleineres Beispielprogramm. Beide haben allerdings
  54. unterschiedlche Versionen der Procedure "gbu". Je nachdem, ob man die
  55. Proceduren  "gbord" und "uline" extern braucht, kann man die eine oder
  56. die andere Version nutzen.
  57.  
  58.        Viel Spaß wünscht
  59.  
  60.                           Røgersøft               [mik 17.05.93]
  61.  
  62.  
  63.  
  64.  
  65.  
  66.  
  67.  
  68.         Greetings to Björn Schotte & Daniel Amor
  69.  
  70.                                     keep coding ...
  71.  
  72.  
  73.  
  74.  
  75.